home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-04 / smalltlk.zip / SOURCES / CMDS.H < prev    next >
C/C++ Source or Header  |  1990-09-13  |  4KB  |  137 lines
  1. extern char x_str[];
  2. /*
  3.     Little Smalltalk
  4.  
  5.     The following very common commands are given a concise description
  6.     in bytecodes.
  7.  
  8. */
  9.  
  10. static char *unspecial[] = {&x_str[2185], &x_str[1980], &x_str[2254], &x_str[2798], &x_str[914],
  11.         &x_str[3015], &x_str[1502], &x_str[2221], &x_str[2360], &x_str[2366],
  12.         &x_str[2848], &x_str[1122], &x_str[2250],
  13.  
  14.         /* after the first 16 - which should be the most common
  15.         messages, order doesn't make as much difference so we
  16.         might as well list things in alphabetical order */
  17.  
  18.         &x_str[421],
  19.         &x_str[586],
  20.         &x_str[625],
  21.         &x_str[699],
  22.         &x_str[708],
  23.         &x_str[867],
  24.         &x_str[955],
  25.         &x_str[968],
  26.         &x_str[1100],
  27.         &x_str[1157],
  28.         &x_str[1395],
  29.         &x_str[1464],
  30.         &x_str[1508],
  31.         &x_str[1594],
  32.         &x_str[1929],
  33.         &x_str[1956],
  34.         &x_str[1998],
  35.         &x_str[2043],
  36.         &x_str[2048],
  37.         &x_str[2066],
  38.         &x_str[2194],
  39.         &x_str[2250],
  40.         &x_str[2288],
  41.         &x_str[2453],
  42.         &x_str[2518],
  43.         &x_str[2530],
  44.         &x_str[2573],
  45.         &x_str[2668],
  46.         &x_str[2704],
  47.         &x_str[2757],
  48.         &x_str[2824],
  49.         &x_str[2829],
  50.         &x_str[2837],
  51.         &x_str[2865],
  52.         &x_str[2976],
  53.         &x_str[3001],
  54.         &x_str[3208],
  55.         &x_str[3225],
  56.         0 };
  57.  
  58. # define VALUECMD 5
  59. # define PRNTCMD  8
  60.  
  61. static char *binspecial[] = {&x_str[2189], &x_str[740], &x_str[2943], &x_str[1283], &x_str[3021],
  62.                       &x_str[28], &x_str[3250], &x_str[2930], &x_str[3166], &x_str[3154],
  63.                       &x_str[1685], &x_str[1660], &x_str[1356], &x_str[425],
  64.               &x_str[16], &x_str[928],
  65.  
  66.               &x_str[419],
  67.               &x_str[12],
  68.               &x_str[18],
  69.               &x_str[474],
  70.               &x_str[495],
  71.               &x_str[507],
  72.               &x_str[517],
  73.               &x_str[807],
  74.               &x_str[901],
  75.               &x_str[936],
  76.               &x_str[1166],
  77.               &x_str[1600],
  78.               &x_str[1605],
  79.               &x_str[1620],
  80.               &x_str[1718],
  81.               &x_str[1709],
  82.               &x_str[2023],
  83.               &x_str[2069],
  84.               &x_str[2102],
  85.               &x_str[2205],
  86.               &x_str[2269],
  87.               &x_str[2403],
  88.               &x_str[2469],
  89.               &x_str[2482],
  90.               &x_str[2542],
  91.               &x_str[2656],
  92.               &x_str[2675],
  93.               &x_str[2695],
  94.               &x_str[2725],
  95.               &x_str[2769],
  96.               &x_str[2818],
  97.               &x_str[2905],
  98.               &x_str[2964],
  99.               &x_str[3201],
  100.               &x_str[3210],
  101.               &x_str[3227],
  102.               &x_str[1728],
  103.               0};
  104.  
  105. static char *arithspecial[] = {&x_str[10], &x_str[14], &x_str[8], &x_str[412],
  106.                         &x_str[849], &x_str[817], &x_str[842],
  107.                         &x_str[21], &x_str[23], &x_str[26], &x_str[3247], &x_str[33], &x_str[31],
  108.             &x_str[2477], &x_str[2383], &x_str[2120], &x_str[2085],
  109.             0};
  110.  
  111. static char *keyspecial[] = {&x_str[757], &x_str[1693], &x_str[1669],
  112.                         &x_str[3028], &x_str[2947], &x_str[744],
  113.             &x_str[1750], &x_str[1881],
  114.             &x_str[2490], &x_str[2553],
  115.             &x_str[794],
  116.             &x_str[1444], &x_str[1483],
  117.             &x_str[1332],
  118.             &x_str[1409],
  119.             &x_str[1184],
  120.             0};
  121.  
  122. /*    The classes included in the standard prelude
  123.     also have a very concise description in bytecode representation
  124. */
  125.  
  126. static char *classpecial[] = {&x_str[38], &x_str[44],
  127.     &x_str[70], &x_str[74], &x_str[80], &x_str[88],
  128.     &x_str[98], &x_str[103], &x_str[109], &x_str[120],
  129.     &x_str[128], &x_str[139], &x_str[145], &x_str[150],
  130.     &x_str[156], &x_str[164], &x_str[176],
  131.     &x_str[185], &x_str[201], &x_str[223], &x_str[238],
  132.     &x_str[245], &x_str[252], &x_str[270],
  133.     &x_str[290], &x_str[297],
  134.     &x_str[324], &x_str[347], &x_str[361], &x_str[368],
  135.     &x_str[386], &x_str[391],
  136.     0 };
  137.